home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / shape.dxr / 00111.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  809 b   |  33 lines

  1. on mouseUp me
  2.   global img, level
  3.   img = 2
  4.   level = 1
  5.   hideit(100, 100)
  6.   showit(101, 101)
  7.   hideit(102, 103)
  8.   set the memberNum of sprite 194 to 660
  9.   set the member of sprite 42 to member("Create2")
  10.   set the blend of sprite 62 to 0
  11.   set the member of sprite 62 to member("Image2-1")
  12.   repeat with X = 1 to 400
  13.     set the blend of sprite 62 to X * 0.25
  14.     updateStage()
  15.   end repeat
  16.   repeat with X = 400 down to 1
  17.     set the blend of sprite 62 to X * 0.25
  18.     updateStage()
  19.   end repeat
  20.   repeat with X = 1 to 400
  21.     set the blend of sprite 62 to X * 0.25
  22.     updateStage()
  23.   end repeat
  24.   repeat with X = 400 down to 1
  25.     set the blend of sprite 62 to X * 0.25
  26.     updateStage()
  27.   end repeat
  28.   repeat with X = 1 to 80
  29.     set the blend of sprite 62 to X * 0.25
  30.     updateStage()
  31.   end repeat
  32. end
  33.